home *** CD-ROM | disk | FTP | other *** search
/ Interactive Quarterly / The Best of New Machine Publishing 1 - Disc 4: Interactive Quarterly.iso / pc / toc.dir / 00196.ls < prev    next >
Encoding:
Text File  |  1997-01-16  |  587 b   |  22 lines
  1. on mouseDown
  2.   puppetSprite(16, 1)
  3.   set the memberNum of sprite 16 to the number of member "W-RAP DOWN.PICT"
  4.   updateStage()
  5.   puppetSound("Squishy")
  6. end
  7.  
  8. on mouseUp
  9.   set the memberNum of sprite 16 to the number of member "W-RAP UP.PICT"
  10.   updateStage()
  11.   puppetSprite(16, 1)
  12.   SetReturn()
  13.   delay(60)
  14.   puppetSprite(16, 0)
  15.   unloadMember(member "WATER DOWN.PICT", "Squishy")
  16.   if the machineType = 256 then
  17.     alert("To launch demo, run INSTALL.EXE in IQDIGIZINE CD-ROM folder: DEMOS\RAPVDLIV.")
  18.   else
  19.     alert("Sorry, this demo does not run on Macintosh computers.")
  20.   end if
  21. end
  22.